home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CICA 1993 April
/
CICA MS Windows - April 1993.iso
/
unzipped
/
programr
/
blrplt
/
procs.dat
< prev
next >
Wrap
Text File
|
1992-03-23
|
523b
|
23 lines
*Paint
procedure Paint(PaintDC : HDC; var PaintInfo: TPaintStruct); virtual;
{PaintInfo.fErase = 0 indicates background has not been redrawn.
PaintInfo.rcPaint defines the rectangle requiring redrawing.
}
begin
end;
*DefWndProc
procedure DefWndProc(var Msg : TMessage); virtual;
begin
@XX2.DefWndProc(Msg);
end;
*DefChildProc
procedure DefChildProc(var Msg : TMessage); virtual;
begin
@XX2.DefChildProc(Msg);
end;
*CanClose
function CanClose : boolean; virtual;
begin
CanClose := @XX2.CanClose;
end;